home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / Palettes / PSAction / PSActionWrap.psw < prev    next >
Text File  |  1995-06-12  |  426b  |  20 lines
  1. defineps DPSgetname(DPSContext ctxt | char *str)
  2.     dup length string cvs str
  3. endps
  4.  
  5. defineps getType(DPSContext ctxt | char *str)
  6.     dup type dup length string cvs str
  7. endps
  8.  
  9. defineps eraseRect(DPSContext ctxt; float gray)
  10.     currentgray gray setgray clippath fill setgray
  11. endps
  12.  
  13. defineps saveState(DPSContext ctxt)
  14.     userdict /saveToken save put
  15. endps
  16.  
  17. defineps restoreState(DPSContext ctxt)
  18.     userdict /saveToken get restore
  19. endps
  20.